home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
TPUG - Toronto PET Users Group
/
TPUG Users Group CD
/
TPUG Users Group CD.iso
/
C64
/
T-TPUG Old Monthly Disks
/
(c)tl.d64
/
example3
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2008-11-26
|
499b
|
23 lines
10 R:EXAMPLE USING JM:
20 T:WHAT IS THE NAME OF THE LARGEST OCEAN?
30 T:
40 T:ATLANTIC OCEAN
50 T:PACIFIC OCEAN
60 T:INDIAN OCEAN
70 *ANSWER
80 T:
90 A:
100 M:ATLANTIC,PACIFIC,INDIAN
110 JM:*ATLANTIC,*PACIFIC,*INDIAN
120 T:PLEASE TYPE ONE OF THE ANSWERS.
130 J:*ANSWER
140 *ATLANTIC
150 T:NO, THE ATLANTIC OCEAN IS THE SECOND LARGEST. TRY AGAIN.
160 J:*ANSWER
170 *PACIFIC
180 T:THAT'S RIGHT!
190 E:
200 *INDIAN
210 T:NO, THE INDIAN OCEAN IS THE THIRD LARGEST. TRY AGAIN.
220 J:*ANSWER